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THE  SUGGESTION  BOX 

Suggestion : 

To  Mr.  Alan  Ford, 

Assistant  Director, 

University  of  Toronto  Computer  Centre. 

Dear  Mr.  Ford, 

Congratulations  on  the  excellent  idea  of  a  Suggestion 
Box.  I  would  suggest  that  all  suggestions  be  reprinted  in 
the  newsletter.  This,  and  reprinting  replies  with  each 
suggestion,  would  greatly  improve  the  level  of  dialogue 
between  the  Centre  and  its  users,  and  give  a  real  vent  to 
users’  feelings  of  frustration. 

Thank  you. 

A  User. 


Reply : 

Your  thanks  have  been  passed  to  the  staff  members 
responsible.  A  careful  review  system  has  been  set  up  to 
capitalize  on  the  suggestions,  which  will  be  noted  in  the 
Newsletter.  All  signed  suggestions  will  also  receive  a 
direct  response  from  an  appropriate  UTCC  manager.  Keep 
them  coming. 

General  Comments 


The  suggestions  have  been  arriving  in  good  quantity 
in  the  Boxes,  located  in  Rooms  107,  109,  and  115A  at  the 
Centre.  The  processing  of  them  as  described  above  is  pro¬ 
ceeding.  Many  direct  replies  have  been  made  and  we  appre¬ 
ciate  highly  the  thoughtful  interest  shown  in  many. 


Because  of  the  initial  volume,  we  are  summarizing  our 
replies  for  several  recurrent  suggestions  and  taking 
blue-pencil  liberties  in  the  interests  of  conciseness  and 
readability . 


More  Suggestions  and  Responses 


Suggestion: 


print  out  the  theoretical  cost  of  each  run. 


Reply:  this  feature  is  now  under  development, 

targeted  along  with  other  improvements 
for  July  1,  1971- 


Suggestion:  when  the  system  goes  down  this  information 

is  not  communicated  to  the  users. 

(Detailed  suggestions  offered  about  operator 
actions,  ALERT  NOTICES,  an  Annunciator  system.) 
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THE  SUGGESTION  BOX  (Cont'd) 


Reply:  The  Operations  Manager  is  actively  considering 

these  points.  It  is  a  matter  which  we  expect 
to  make  better. 


Suggestion:  the  Post  Office  should  stay  open  all  night 

and... clear  the  printers  more  often  and... 
rearrange  the  printers  and... extend  the 
service  of  locating  jobs  to  both  systems  and 
...not  drop  card  decks  and... have  a  call 
buzzer ... "Service  has  improved  since  my 
complaint  last  week". 

Reply:  immediate  attention  was  given  to  these 

problems  and,  as  indicated,  some  improvement 
has  occurred.  Physical  rearrangements  are 
planned  which  will  help  meet  these  suggestions. 


Suggestion:  Keep  the  Room  109  CPS  terminals  better  main¬ 

tained. 

Reply:  Mr.  Goldfarb ,  the  Interactive  Systems  Manager, 

is  working  with  UTCC  and  IBM  to  correct  this 
fault . 


Suggestion:  Provide  more  user  space  for  studying  and 

waiting  for  output. 

Reply:  UTCC  is  gasping  for  breathing  room!  If  we 

can  ever  obtain  sufficient  space  this  request 
will  be  honoured.  Keeping  us  informed  of 
these  needs  helps  us  justify  our  space 
requirements . 


Suggestion: 
Reply : 


TIP:  if  a  keypunch  anywhere  is  out  of  order 

flag  it  with  an  annotated  card  and  also 
advise  the  nearest  terminal  or  Centre 
employee.  Improved  maintenance  arrange¬ 
ments  are  being  sought  with  IBM. 


get  more  keypunches  and  keep  them  better 
maintained . 

space  and  budget  problems  prevent  us  from 
doing  more  here.  The  Undergraduate  Terminal 
areas,  which  have  been  designated  to  provide 
the  bulk  of  keypunch  equipment,  are  under 
other  jurisdictions  to  whom  we  have  passed 
these  suggestions . 
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THE  SUGGESTION  BOX  (Cont’d) 


Suggestion:  please  check  faulty  carriage  control  on 

the  use  of  in  WATFIV. 

Reply:  this  has  been  referred  to  the  coordinator 

for  these  processors.  We  hope  users  will 
always  report  such  bugs  at  once  to  our 
Users’  Service  Group  staff. 


Suggestion:  many  users  throw  out  their  used  computer 

cards  and  paper,  which  Physical  Plant 
collects  as  waste.  It  is  eventually  used 
for  land  fill;  a  shame,  since  this  can  be 
recycled.  I  suggest  that  UTCC  provide  a 
collecting  service  in  order  to  meet  the 
quantity  requirements  of  the  reclamation 
companies . 

Reply:  we  have  been  trying  to  set  up  such  a  service 

ever  since  one  of  our  programmers  first 
became  concerned  about  it.  There  are  serious 
practical  problems  (e.g.  storage  space) 
which  we  intend  to  solve. 


Suggestion:  have  weekly  accounting  sheets  sent  on  request. 


Reply : 


Mr.  Palter,  our  Administrative  Manager,  says, 
'’please  send  your  requests”. 


Suggestion:  Adopt  Z-fold  Calcomp  paper. 

Reply:  This  will  not  suit  all  of  our  users,  yet 

anyone  can  fold  the  continuous  paper  now 
being  used.  We  solicit  further  suggestions 
on  this  one,  however,  in  case  we  are  mis¬ 
taken  about  the  wishes  of  the  majority. 

Suggestion:  .  stop  changing  the  compilers  and... the  OS 

releases  and... don’t  use  HASP. 

Reply:  we  use  HASP  because  we  can  do  more  work  for 

more  people  with  it  than  we  could  without . 

Its  input/output,  scheduling  and  system 
control  features  are  invaluable.  Systems 
are  upgraded  in  order  to  provide  the  best 
possible  service.  Although  some  upgrades 
do  bring  in  new  bugs,  the  overall  effect  is 
definitely  that  of  improvement.  Furthermore, 
IBM  support  dwells  upon  their  "latest  and 
best"  versions  and  is  not  to  be  done  without. 
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THE  SUGGESTION  BOX  (Cont’d) 

Suggestion:  bring  back  the  old  407  lister. 

Reply:  it  didn’t  like  EBCDIC  punch  codes  and  we 

traded  it  in  for  an  ability  to  do  more  things 
better.  We  are  working  harder  to  improve 


the  S/360-20  listing  service  and  to  provide 
other  alternatives . 

Suggestion: 

provide  more  HASP  service  and  a  class  choice 
on  S/36O  No . 2 . 

Reply : 

done,  per  the  recent  core  upgrade  of  System  #2. 

Suggestion: 

improve  the  speed  of  the  remote  terminals. 

Reply : 

technical  difficulties  abound  but  the 
question  is  under  study.  Only  New  Physics 
is  really  busy,  however.  All  others  could 
process  several  times  as  much  work  with  ease. 

Suggestion: 

get  more  and  better  programming  advisors . 

Reply : 

some  such  suggestions  arise  from  a  confusion 
regarding  the  relative  roles  of  regular 
and  part  time  advisors.  This  is  a  matter 
of  active  UTCC  Management  interest.  Please 
discuss  any  problems  in  this  area  with  Mrs. 
Davidson  (Room  115A)  or  Mr.  Williams  (Room  128) 

Suggestion: 

the  7094  is  fading  fast.  Wouldn’t  it  make 
sense  to  put  all  7094  hardware  in  New  Physics? 

Reply : 

Done  ! 

Suggestion: 

more  kilobytes  for  WATFOR. 

Reply : 

coming  soon,  with  WATFIV.  See  Products 
and  Services  News. 

9  TRACK  INCREMENTAL  TAPE  DRIVE 

We  have  recently  received  a  query  from  Dr.  Lew  in  the 
Department  of  Pharmacology  about  obtaining  a  9  track  incre¬ 
mental  tape  drive  which  would  produce  an  IBM  compatible  tape. 
The  Department  is  willing  to  purchase  a  suitable  piece  of 
equipment  if  it  is  available.  Anyone  knowing  of  the  exis¬ 
tence  and  availability  of  such  a  unit  is  asked  to  contact 
Dr.  Lew  at  928-6014  or  Dr.  Hsia  at  928-4084. 
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THE  NEWSLETTER  -  ITS  NAME  AND  SCOPE 


Our  recent  offer  to  extend  the  scope  of  the  Newsletter 
has  not  been  tested  by  University  of  Toronto  sources  yet. 
Activities  of  Universities  of  Ontario,  Computer  Coordination 
Group,  the  Canadian  Information  Processing  Society  and  the 
Canadian  Standards  Association,  have  been  published.  But, 
except  for  the  Computer  Research  Facility,  no  University 
of  Toronto  news.  The  offer  is  still  open! 

The  question  of  a  name  is  also  still  open.  Suggestions? 

Through  the  courtesy  of  the  General  Services  Adminis¬ 
tration,  Washington  D.C.,  we  are  able  to  advise  of 
National  Archives  project  supported  by  the  Ford  Foundation, 
which  will  index  by  computer  the  Papers  of  the  Continental 
Congress.  Further  information  is  available  from  the 
editor’s  office,  (Room  105,  Sandford  Fleming  Laboratories). 

This  information,  contained  in  GSA  News  Release  #5033, 
arrived  by  mail  unexpectedly.  Was  this  a  response  to  our 
new  News  orientation  announced  in  Newsletter  70? 


PERSONNEL  CHANGES 

The  Operations  section  of  UTCC  welcomes  Jeffrey  S.  O’Brien 
and  Wayne  Shimuzu  to  the  ranks. 


SSBs  ISSUED 


2:71:1  Problem  with  Exponent  overflow  in  Floating  Point 
Arithmetic  on  S/360  No. 2 

2  Error  in  Newsletter  72 

3:71  Planned  System  Down  Time  on  Sunday  31/1/71 

4:71:1  Large  FORTRAN  H  compiler  available  in  System  1 
2  SIMON  Update 

5:71  New  Tape  Specification  Program  for  S/36O  Tape  Jobs 

6:71:1  High  Speed  Job  Stream  Region  Change 

2  SPARTA  Package  added  to  WATLIB 

3  CALCOMP  on  S/36O  No . 2 


7:71 


7094  Users  Please  Note 
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RECENT  ACQUISITIONS  IN  THE  DEPARTMENT  OF  COMPUTER  SCIENCE  LIBRARY 

ACM  Comparative  Operating  Systems  Symposium,  Cleveland,  1969- 
Comparative  operating  systems. 

Cnu,  Yaohan. 

Introduction  to  computer  organization. 

Gerald,  Curtis  F. 

Applied  numerical  analysis. 

Kennedy,  Michael. 

Ten  statement  FORTRAN  plus  FORTRAN  IV,  for  the  IBM  360, 
featuring  the  WATFOR  and  WATFIV  compilers,  by  M.  Kennedy 
and  M.  B.  Solomon. 

Leech,  John,  ed. 

computational  problems  in  abstract  algebra. 

McKeeman,  W.  M. 

A  compiler  generator,  by  W.  M.  McKeeman,  J.J.  Horning  and 
D.  B.  Wortman. 

Pylyshyn,  Zenon  W.,  ed. 

Perspectives  on  the  computer  revolution. 

Rice,  John  Rischard. 

The  approximation  of  functions . 

SHARE 

Proceedings  of  SHARE  XXXIV,  Denver,  March,  1970. 

Toronto.  University.  Dept,  of  Computer  Science. 

ALGOLW  guide  (reproduced  from  2  Stanford  manuals).  Dec. 1970. 

Tribus ,  Myron . ■ 

Rational  descriptions,  decisions,  and  designs. 

Watson,  Richard  W. 

Timesharing  system  design  concepts. 
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SECOND  ONTARIO  UNIVERSITIES  COMPUTING  CONFERENCE 


The  second  conference  sponsored  by  the  Computer 
Coordination  Group  was  held  in  Ottawa  on  January  28th 
and  29th,  1971*  Despite  some  disruptions  caused  by 
travel  problems  under  severe  winter  conditions,  the 
attendance  was  good  and  interest  was  high. 

Among  participants  from  the  University  of  Toronto 
were  Dr.  J.  C.  Wilson,  Director  of  UTCC,  J.  R.  McBride, 
Manager  of  the  Computer  Research  Facility,  and  Professor 
C.  C.  Gotlieb. 

Professor  J.N.P.  Hume,  H.  Mikkelsen,  and  C.  A.  Ford 
presented  papers  at  this  conference.  Professor  Hume's 
paper,  on  batch  services,  aroused  some  lively  discussion 
among  proponents  of  batch  and  of  time-sharing  systems. 

Mr.  Mikkelsen 's  described  the  long-term  plans  for  admin¬ 
istrative  computing  at  the  University  of  Toronto.  Mr. 
Ford  reviewed  the  broad  issues  of  computer  resource 
allocation . 

Please  address  requests  for  full  texts  to  Mrs.  L. 

S.  Kemeny,  Computer  Coordination  Group,  Suite  1001, 

85  Range  Road,  Ottawa  2,  Ontario.  Copies  of  Mr.  Ford's 
paper  are  available  from  UTCC  (Room  105,  Sandford  Fleming 
Building) . 


PERIODICAL  REVIEW:  SOFTWARE  -  PRACTICE  AND  EXPERIENCE 

We  have  just  received  a  copy  of  SOFTWARE  -  Practice 
and  Experience,  Volume  1,  No.l.  This  brand  new  periodical 
is  the  product  of  Wiley-Inters cience .  The  subscription 
price  is  L.8.50  ($20.00)  per  year.  It  will  be  published 
quarterly  by  the  Publications  Department,  John  Wiley  & 

Sons  Ltd.,  Baffin  .Lane,  Chichester,  Sussex,  England. 

According  to  the  Editors,  Professor  D.  W.  Barron  of 
the  University  of  Southampton  and  C.  A.  Lang  of  Cambridge, 
U.K.,  "the  software  scene  is  littered  with  the  whitening 
bones  of  projects  whose  designers,  with  the  ever-present 
triumph  of  optimism  over  experience,  thought  that  they  could 
do  better  this  time.  SOFTWARE  aims  to  improve  this  situation 
by  a  direct  attack  on  the  communication  problem,  encouraging 
workers  to  write  up  their  work  in  a  form  that  will  be  useful 
to  others.  In  the  long  run  the  success  of  the  journal  will 
depend  on  its  readers.  Only  if  sufficient  people  are  pre¬ 
pared  to  spare  the  time  to  record  their  practice  and  exper¬ 
ience  will  SOFTWARE  fulfil  its  aims." 
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PERIODICAL  REVIEW:  SOFTWARE  -  PRACTICE  AND  EXPERIENCE  (Cont’d) 

The  style  of  the  publication  is  that  of  a  good  technical 
journal.  An  Author's  Guide  and  Notes  for  Contributors  are 
included.  This  issue  offers  seven  papers  which  appear  to 
be  well  done  and  of  useful  content.  Although  all  show 
English  origins,  style  and  content  should  be  acceptable  and 
relevant  to  North  American  readers.  The  editorial  board 
is  thoroughly  international. 

The  masthead  page  claims  that  SOFTWARE  should  appeal 
to  all  who  design,  implement  or  maintain  software,  who 
manage  software  projects,  or  who  want  to  learn  about  soft¬ 
ware.  It  may  well  do  so. 
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STORAGE  SPACE  RESERVATIONS 


Users  holding  card  storage  space  in  Room  109, 

Sandford  Fleming,  are  asked  to  renew  their  reservations 
on  or  before  March  15th.  Please  see  Nancy  Okada,  in 
Room  107,  Sandford  Fleming. 

PRODUCTION  DATA 

The  production  figures  for  January  show  the  customary 
upward  swing  from  the  usual  December  low  point.  The  rise 
in  the  Undergraduate  Terminal  service  activities  is  quite 
in  parallel  with  the  experience  one  year  ago  but  the 
regular  S/360  load  did  not  rebound  in  the  usual  way.  The 
presence  of  ALGOLW  in  the  High  Speed  Job  Stream  may  account 
for  the  easing  of  the  regular  load. 

System  capacity  has  been  increased  radically  by  the 
addition  of  more  core  memory  to  System  No. 2.  The  upper 
limit  to  the  job  volume  for  the  coming  peak  period  will 
almost  certainly  depend  only  on  the  activity  the  users 
can  generate. 

Tables  I  and  II  illustrate  the  trends  for  the  past 
three  months . 


System 

November 

December 

J  anuary 

S/36O 

19,709 

17,868 

16,536 

7094 

2,090 

1,429 

1,533  ' 

HSJS 

75,193 

47,-486 

58,527 

TOTAL 

96,992 

66,783 

1  76,596 

TABLE  I 


Number  of  Jobs  Processed 
November,  December,  January. 
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PRODUCTION  DATA  (Cont'd) 


System 

January  1970 

January  1971 

Change 

s/360 

9,703 

16,536 

+  70$ 

709^ 

2,803 

1,533 

-45  % 

HSJS 

48,647 

58,527 

+  20% 

TOTAL 

61,153 

76,596 

+25% 

TABLE  II  -  Production  Comparison 

January  1970  with  January  1971- 


7094  NEWS 


To  confirm  our  announcements  in  Newsletter  72  and 
System  Status  Bulletin  7:71  the  1401  was  moved  during 
the  weekend  of  Friday,  February  19th.  The  709^/1^01 
system  has  been  restored  to  service  with  the  following 
changes  in  methods: 

*  7094  input  will  no  longer  be  accepted  in  Room  109 
of  the  Sandford  Fleming  Building; 

*  output  for  jobs  submitted  before  the  cutoff  date 
of  February  18th  may  be  reclaimed  from  the  "Post 
Office"  (Room  107,  Sandford  Fleming)  as  usual; 

*  effective  9:00  a.m.  Tuesday,  February  23rd,  all 
7094  input/output  is  being  handled  at  the  709^ 
site  in  Room  1203  of  the  Burton  Tower. 

The  initial  input/output  arrangements  will  be  some¬ 
what  rudimentary,  pending  expected  early  delivery  and 
installation  of  shelves  and  hatches.  Please  bear  with  us. 

The  709^  room  will  be  accessible  to  users  only 
between  the  hours  of  9:00  a.m.  and  5:00  p.m.  Monday 
through  Friday,  except  by  special  arrangement.  Please 
call  Mrs.  Walton  or  Mrs.  Armstrong  (928-709* *0  for 
any  scheduling  or  other  assistance  you  may  need. 
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HIGH  SPEED  JOB  STREAM  SERVICE  -  FURTHER  DEVELOPMENTS 

Since  the  publication  of  Newsletter  72  the  EUT/ASUT 
High  Speed  Job  Stream  Monitor  REGION  has  been  increased 
to  150K  (reference  SSB  6:71:1)- 

k 

At  this  time  work  is  progressing  on  a  version  of  the 
WATFIV  V1L2  compiler  which  will  be  similar  to  the  WATFOR 
compiler  currently  available  at  EUT/ASUT  and  which  will 
support  the  UTCC  $JOB  fixed  format  job  card  and  the  UTCC 
$DATA  card  plus  full-sentence  diagnostic  error  messages. 
This  version  of  the  WATFIV  compiler  will  make  available 
to  EUT/ASUT  WATFIV  users  the  increased  core  made  avail¬ 
able  by  the  REGION  change  mentioned  above.  The  available 
core  will  be  approximately  double  that  currently  provided 
to  EUT/ASUT  WATFOR  users. 

Other  advantages  of  the  WATFIV  compiler  over  the 
WATFOR  compiler  are: 

(1)  NAMELIST  feature  is  implemented  (see  C28-6515). 

(2)  DIRECT-ACCESS  I/O  features  are  implemented 

(see  C28-6515). 

(3)  CHARACTER  variables  have  been  implemented. 

(4)  Undefined  array  elements  are  identified  explicitly. 

(5)  Error  diagnostics  are  more  explicit. 

(6)  More  aids  for  localising  errors. 

(7)  Increased  compatibility  with  IBM  FORTRAN  G  and  H 

compilers : 

(a)  Computed  GOTO f s  work  as  specified  in  C28-6515 
when  index  is  outside  allowable  range 

(b)  Array  elements  as  arguments  may  be  passed  to 
subprogram  parameters  which  are  array  names 
(see  C28-6515) 

(c)  Variable  dimensions  work  as  specified  by 
C28-6515 

(d)  Character  set  conventions  are  compatible 
FORTRAN  G  and  H  i.e.,  treatment  of 

(e)  Treatment  of  ENTRY  points  in  function  sub¬ 
programs  is  as  specified  in  C28-6515 
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HIGH  SPEED  JOB  STREAM  SERVICE  -  FURTHER  DEVELOPMENTS  (Cont'd) 

(f)  Statement  ordering  conventions  are  followed 

i.e.  specification,  statement  function 
definitions,  executable  statements. 

(g)  Real  constants  of  the  form  IE2 ,  i.e.,  without 
explicit  decimal  point  are  now  recognized. 

(8)  A  few  more  language  extensions,  e.g.,  multiple 
statements  per  card,  are  implemented. 

The  availability  of  this  UTCC  modified  WATFIV  V1L2 
compiler  to  EUT/ASUT  users  will  be  announced  in  an  SSB 
at  the  appropriate  time. 

References : 

1.  /360  WATFIV  IMPLEMENTATION  GUIDE  -  University  of 

Waterloo . 

2.  FORTRAN  IV  with  WATFOR  and  WATFIV,  by  Cress,  Dirksen 
and  Graham  -  Prentice  Hall. 

3.  IBM  System/360  FORTRAN  IV  Language  -  C28-6515 

4.  IBM  System/360  FORTRAN  IV  (G  and  H)  Programmers’ 
Guide  -  C28-6817 . 

SYSTEM  RELIABILITY 


A  decrease  in  uptime  on  System  1  was  caused  by  a 
major  hardware  failure  in  the  Multiplexor  Channel.  The 
software  problems  reported  last  month  are  still  under 
investigation . 


System 

Month 

Uptime 

MTBF 

S/360  #1 

December 

January 

97. « 

94,6? 

8.8  hours 

8.9  hours 

S/360  #2 

December 

98.0$ 

11.5  hours 

J  anuary 

97 .9% 

15 . 8  hours 
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ADMINISTRATIVE  TERMINAL  SYSTEM 


LJ..S. . it? 

Administrative  Terminal  System  (ATS/360)  is  a 
specialized  time  sharing  system  providing  the  user  at  a  2741 
Communications  Terminal  with  a  very  easy-to-use  and  powerful 
text  editing  facility.  ATS/360  should  prove  extremely  useful 
in  the  production  of  any  sort  of  document.  Rough  drafts  of 
documents  may  be  prepared  and  proof-read  and  those  sections 
requiring  editing  may  then  be  corrected  in  computer  storage; 
corrections  or  revisions  may  be  made  without  retyping  entire 
sections  of  the  document.  Error  free  and  up-to-date 
documents  may  therefore  be  produced  with  significant  savings 
in  time. 

Text  may  be  entered  into  the  system  with  free-form  and 
fixed  format  information  intermixed.  Free-form  is  used  to 
establish  a  variable-format  condition  allowing  the  user  to 
change  the  page  depth  and  line  width  sizes  prior  to  the 
printout  of  the  document;  the  printout  will  automatically  be 
rearranged  by  ATS  to  correspond  to  the  new  specifications. 
Fixed  format  Is  used  to  enter  information  that  must  be 
printed  as  entered;  for  example/  tables  or  charts  must 
appear  in  fixed  positions  in  the  printout  and  should  be 
entered  as  fixed  format  information. 

The  text  may  be  saved  on  direct  access  storage  and  may 
be  changed  and  corrected  at  any  time.  Correction  methods 
include  relocating  single  or  multiple  lines/  adding  or 
deleting  single  or  multiple  characters/  words  or  lines/  and 
replacing  characters  of  a  line  with  other  characters.  The 
format  of  the  output  may  also  he  easily  altered:  automatic 
page  headings/  footings/  page  numbering  and  right-margin 
justification  may  be  requested.  Other  features  include 
centering  lines  of  text  and  altering  page  depth  and  line 
width. 

The  material  which  you  are  reading  was  prepared  using 

ATS. 


UTCC  NL  73 


Page  14 


ARM  1  N  1  ST  RAT-LYE  -TERM INAL  SYSTEM 

AY.al.Ubi  i  i  tv 

ATS/360,  operating  in  S/360  No.  1,  wi 1 1  become  available 
to  users  on  March  1,  1971.  The  hours  of  service  will  be: 

Monday,  Wednesday,  Thursday,  Friday 
9:30  a .m.  -  4:45  p.m. 

7 : 30  p.m.  -  6:45  a.m. 

Tuesday 

9:30  a.m.  -  4:45  p.m. 

9 : 00  p.m.  -  6:45  a.m. 

Saturday,  Sunday 
9 : 30  a.m.  -  4:45  p.m. 

NOTE:  1)  Service  after  3:00  a.m.  may  on  occasion  be 

preempted  for  specially  scheduled  work. 

2)  During  the  remaining  school  period,  March 
through  April,  ATS  will  be  available  on 
Tuesday  evenings  from  7:30  p.m. 

Introduction  to  ATS 

Introductions  to  ATS  through  demonstrations  of  the 
capabilities  of  ATS  will  be  presented  during  March.  Persons 
interested  in  attending  should  contact  Miss  Edmison  at  928- 
3787. 

Learnin.&  at$ 

A  special  addition  to  ATS,  called  LEARN  ATS.  is 
available  on  the  ATS  system  for  se 1 f- teach i ng  of  ATS.  LEARN 
AT  S  is  accompanied  by  a  LEARN  ATS  Workbook  containing 
instructions  for  using  LEARN  AT S  and  exercises  for  each 
lesson  presented.  A  LEARN  AT  S  Workbook  will  be  made 
available  to  each  account.  An  ATS  user's  guide  (ATS/OS 
Terminal  Operations  Manual)  describing  in  detail  the  features 
and  use  of  ATS  will  also  be  available. 

Qett  in  &  _&q_A£.£nuiI  t 

Users  may  obtain  an  ATS  account  from  Mrs.  Pldcock, 
Sandford  Fleming,  Room  103,  928-8703. 
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ADMINISTRATIVE  TERMINAL  SYSTEM 

A.IS_..Pr  Lc.  in.fi 

Charges  for  the  use  of  ATS  will  be  as  follows: 

a)  Terminal  Rental 

1)  leased  line . $100  per  month 

2)  dial-up  line. ...$125  per  month 

b)  Terminal  Connect  Time 

$5.00  per  hour 

c)  Disk  Storage  (for  storing  documents) 

$0.50  per  track  month 
(As  ATS  documents  are  stored  on 
direct  access  storage  in  blocks 
(PSR's)  of  4  per  track,  disk 
storage  will  actually  be  charged 
at  the  rate  of  $0,125  per  PSR  month.) 

d)  Document  Backups 

Documents  may  be  dumped  to  tape  for 
individual  backup  purposes  at  the 
flat  rate  setup  charge  of  $5.00 

NOTE:  These  prices  are  firm  for  the  balance  of  1970-71. 

Prices  for  all  services  are  to  be  reviewed,  with  any 
changes  to  come  Into  effect  on  July  1,  1971. 

Accessing  ATS 

Users  with  dial-up  terminals  may  access  ATS  by  dialing 
928-7100.  Users  with  leased  line  terminals  who  wish  to 
transfer  their  line  from  CPS  to  ATS  should  contact  Mr.  S. 
Uoldfarb  at  928-3787.  Users  wishing  dial-up  terminals  should 
contact  Mr.  J.  Palter  at  928-8948. 

Inqui r ies 

Any  inquiries  regarding  ATS  may  be  directed  to  Mr.  S. 
Uoldfarb  or  Mr.  N.  Trufyn  at  928-3787. 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  * 

The  FORTRAN  H  compiler  can,  through  use  of  the  OPT  para¬ 
meter,  be  directed  to  produce  object  code  which  is  highly 
efficient  compared  with  the  code  generated  by  the  FORTRAN  G 
or  WATFOR  compiler.  It  produces  both  smaller  and  faster  exe¬ 
cuting  object  modules. 

Suggested  uses  of  the  FORTRAN  H  compiler 

Programs  of  the  following  types  are  candidates  for  opti¬ 
mization  : 

1.  programs  with  long  execution  times; 

2.  programs  which  are  not  recompiled  frequently. 

In  general,  the  FORTRAN  H  compiler  should  not  be  used  for 
testing,  since: 

1.  the  debug  facilities  of  FORTRAN  G  are  not  available 
with  the  H  compiler; 

2.  properly  speaking,  program  tests  are  top-heavy  with 
compilation  time,  not  with  execution  time. 

Most  importantly,  the  optimization  features  are  not 
designed  to  provide  corrective  measures  to  programs  which,  as 
a  result  of  bad  programming  practices,  are  excessively  large 
in  either  core  storage  or  execution  time  requirements.  On 
the  contrary,  programs  which  are  to  be  optimized  ought  to  be 
written  with  considerably  more  care  than  those  for  which 
optimization  is  not  intended. 

Time  spent  in  program  design  and  subprogram  organization 
is  more  beneficial  than  equivalent  time  spent  coding  large, 
sophisticated  modules. 

Subprograms  should,  in  so  far  as  possible,  be  tested  inde¬ 
pendently  of  one  another  using  specially  designed  test  data 
and  programs  to  ’drive’  the  subprograms. 


*  Acknowledgment 

Vogt,  C.,  ’Optimization  with  FORTRAN  H',  Computing  Centre 
Newsletter,  University  of  Waterloo 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  (Cont'd) 

Level  0  Optimization 

Coding  is  not  moved  around  within  the  program  and  no  attempt 
is  made  to  analyze  the  structure  of  the  program.  Compilation 
involves : 

1.  BASIC  REGISTER  ASSIGNMENT 

—  one  accumulator  register 

—  one  branching  register 
--  one  indexing  register 

—  etc. 

This  approach  simplifies  the  production  of  object 
code,  but  does  not  make  the  most  efficient  use  of 
all  available  registers. 

Level  1  Optimization 


The  entire  program  is  treated  as  a  loop,  while  sections 
of  coding,  headed  and  terminated  by  labelled  statements,  are 
blocks.  Optimization  involves: 

1.  FULL  REGISTER  ASSIGNMENT 

—  retention  of  the  most  active  base  addresses  and 
variables  in  registers  across  the  whole  program, 
thereby  reducing  load  instructions 3 

—  retention  of  local  variables  in  registers  during 
the  processing  of  the  blocks  in  which  they  occur, 
thereby  reducing  load  and  store  instructions, 

e.g.  , 

I=J  +  K 
L=I  +  M 
N=I  +  L 

The  values  of  I  and  L  are  not  stored  immediately 
after  assignment,  but  are  left  in  registers  to  be 
used  in  subsequent  statements,  thus  requiring  more 
registers  to  perform  the  additions,  but  eliminating 
several  store  and  load  instructions j 

--  use  of  RX  branch  instructions,  reducing  load 
instructions  and  address  constants. 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  (Cont’d) 

Level  2  Optimization 

The  loop  structure  and  data  flow  of  the  entire  program 
are  analyzed.  Optimization  involves: 

1.  FULL  REGISTER  ASSIGNMENT 

—  retention  of  the  most  active  constants,  variables, 
and  base  addresses  in  registers  across  a  loop ; 

—  use  of  BXLE  instruction  for  loop  termination, 
when  possible. 


2 .  BACKWARD  MOVEMENT 


--  movement  outside  a  loop  of  computations  which 


need  not  be  performed 

Before  Optimization 

DO  50  I  =  1,100 
A  =  B  *  C 

l 

50  CONTINUE 


within  the  loop,  e.g.. 

After  Optimization 

A  =  B  *  C 

DO  50  I  =  1,100 

l 

50  CONTINUE 


The  optimization  routines  will  also  detect  and 
optimize  less  obvious  conditions,  such  as 
redundant  coding  produced  by  earlier  passes  of 
the  optimization  routines. 


3.  COMMON  EXPRESSION  ELIMINATION 


—  Removal  or  replacement  of  redundant  or  unnecessary 
calculations  of  identical  arithmetic  expressions, 

e.g.  , 

A  =  B  +  (  C+D);  E=C+D 


Compiler  Code 

tl  -  C  +  D 
t2  =  B  +  tl— **A 

t3  =  C  +  D  — **E 


Optimized  Code 

tl  =  C  +  D 

t2  =  B  +  tl  - 

tl  — 


■^A 

*-E 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  (Cont’d) 

4.  SIMPLE  STORE  ELIMINATION 

—  Deletion  of  references  to  some  variables,  e.g. 

Before  Optimization  After  Optimization 

Z  =  X  A  =  X  +  B 

A  =  Z  +  B  D  =  X  *  A 

D  =.  Z  *  A 

Program  Structure  Considerations 

The  term  ’loop’  refers  to  DO  loops  and  other  such  con¬ 
figurations  of  coding  that  the  programmer  regards  as  a  loop. 

Loops  preceded  by  an  IF,  conditional  GOTO,  or  READ  with 
END  or  ERR  are  not  identified  by  the  optimizer,  and  efficiency 
is  thereby  lost.  A  CONTINUE  at  the  end  of  a  DO  obscures  any 
loop,  other  than  a  DO  loop,  that  follows  immediately  after  the 
CONTINUE  without  intervening  initialization. 

Backward  movement  of  computations  from  inside  a  loop 
to  the  loop  initialization  is  done  on  the  assumption  that 
every  statement  in  the  loop  is  executed  more  frequently  than 
the  initialization.  To  prevent  Backward  Movement  in  those 
cases  where  this  assumption  is  false,  place  the  coding  which 
is  to  remain  in  the  loop  in  a  sub-program  and  call  it  from  within 
the  loop . 

References  to  elements  of  an  array  which  appear  in  an 
EQUIVALENCE  statement  cannot  be  optimized  with  respect  to 
Common  Expression  Elimination,  nor  can  such  references  be 
moved  out  of  a  loop. 

References  to  variables  which  are  EQUIVALENCEd  to  other 
variables  (not  in  COMMON)  of  the  same  type  and  length  do  not 
reduce  optimization.  However,  references  to  variables  which 
have  been  EQUIVALENCEd  in  any  other  way  cannot  be  optimized 
in  any  way . 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  (Cont'd) 


Programming  Restrictions 


In  general.  Level  1  or  Level  2  optimization  results 
in  longer  compilation  time,  but  produces  more  concise 
object  code  and  shorter  execution  times.  Specific  differ¬ 
ences  in  generated  code  may  result  from  the  following 
circumstances : 


(1) 


(2) 


If  a  list  of  statement  numbers  in  an  assigned 
GOTO  is  incomplete,  errors  may  arise  in  the 
optimized  code  which  were  not  present  in  the 
unoptimized  code; 

Computational  reordering  may  result  in  differ¬ 
ent  execution  time  behaviour,  e.g.,  calls  to 
FORTRAN  library  functions  may  be  moved  to  the 
back  of  a  loop  and  thereby  executed  before  tests 
of  the  argument  of  the  function 


Before  Optimization 

DO  11  I  1,10 
DO  12  J  1,10 
IF ( B ( I ) . LT . 0 ) GOTO  11 
12  C(J) =  SQRT(B(I) ) 

11  CONTINUE 


After  Optimization 

DO  11  I  1,10 
DO  12  J  1,10 
C ( J ) —  SQRT ( B ( I ) ) 

12  IF ( B ( I ) . LT . 0 ) GOTO  11 
11  CONTINUE 


Prearranging  the  source  code  to  remove  the  test 
from  the  inner  loop  will  avoid  the  problem. 
Similar  problems  may  result  with  CALL  DVCHK(J) 
and  CALL  OVERFL(J). 

(3)  Subprograms  with  names  identical  to  FORTRAN 
supplied  subprograms  should  be  specified  in  an 
EXTERNAL  statement  if  errors  are  not  to  be 
introduced  during  optimization. 

(4)  Assignment  of  values  to  variables  which  are 
implicitly  EQUIVALENCEd  may  not  take  place, 

e.g.  > 

COMMON  X, Y1 ( 10 ) ,W,Z 
EQUIVALENCE  (Y1,Y2) 

DIMENSION  Y2 ( 12 ) 

The  implied  EQUIVALENCE  between  Y2(ll)  and  W, 
and  Y2(12)  and  Z  may  not  result  in  proper  value 
assignment 

W  =  Q 

A  =  Y2(l)  where  1=2 

the  value  of  Q  might  not  be  assigned  to  A. 
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OPTIMIZATION  WITH  THE  FORTRAN  H  COMPILER  (Cont’d) 

General  FORTRAN  Efficiency  Pointers 

(1)  Replace  references  to  a  single  multi-dimensional  array 
by  references  to  several  lower-dimensional  arrays 

(2)  When  passing  a  large  number  of  variables  among  calling 
and  called  programs,  place  some,  if  not  all,  of  the 
variables  in  C0MM0N 

(3)  Specify  entries  in  EQUIVALENCE  groups  in  descending 
order  according  to  offset  to  reduce  compilation  time* 

*  i.e.  Specify  EQUIVALENCE (ARR1 ( 10 , 10 ) ,ARR2 ( 2 , 5 ) ,VAR1 ) 

Rather  than  EQUIVALENCE (ARR1 (10 ,10 ) ,VAR1 ) , ( ARR2 (2,5) , VAR1 ) 

(4)  In  logical  IF  statements,  if  A  is  more  often  true 
than  B,  then  write 

A. or.B  rather  than  B.or.A 

B. and.A  rather  than  A.and.B. 

Avoid  expressions  which  contain 

A  mixture  of  both  .AND.  and  .OR.  operators 
A  .N0T.  followed  by  a  parenthesized  expression 

(5)  The  assigned  G0T0  is  the  fastest  conditional  branch. 

Use  an  arithmetic  IF,  for  three-way  branching,  n0t  a 
computed  G0T0 

IF ( 1-2 ) 20 , 30 , 40  rather  than  G0T0 ( 10 , 20 , 30 )  ,  I 

Use  a  logical  IF  for  two-way  branching,  not  an 
arithmetic  IF 

IF ( A . GT . B ) G0T02O  rather  than  IF(A-B)10 ,10 ,20 

10  CONTINUE 

(6)  If  the  starting  addresses  of  the  first  and  last  variables 
in  a  C0MM0N  block  differ  by  more  than  4095  bytes,  more 
than  one  base  address  will  be  needed  for  a  C0MM0N.  Hence, 
smaller  variables  and  arrays  should  be  placed  ahead  of 
larger  arrays,  i.e.,  for 

REAL*4x (1250) , Y ( 50 ) 

specify 

C0MM0N  Y,X 

instead  of 

C0MM0N  X, Y 

When  possible,  combine  several  different  C0MM0N  blocks 
into  one  block  {t  4096  bytes  long) . 


f 
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TECHNICAL  TIP 


LM0DMAP  SERVICE  AID 

A  very  useful  program  for  mapping  an  object  module 
on  disk  is  LM0DMAP .  It  displays  the  load  module  by 
CSECT,  entry  point,  and  External  reference  -  the  entire 
external  symbol  dictionary  item. 

It  is  simple  to  use  and  the  JCL  is: 


// 

J0B 

/ /J0BLIB 

DD 

DSNAME=IC .MTCB . LINKLIB , DISP=SHR 

//SI 

EXEC 

PGM=LM0DMAP 

//SYSPRINT 

DD 

SYS0UT=A 

/ /DD1 
// 

/* 

// 

DD 

DSNAME=MYLIB ( MEMBER ) , UNIT- 2314, 
DISP=0LD , V0LUME=SER= 

Here  DD1  points  at  the  library,  MYLIB,  containing 
the  member  (MEMBER),  which  is  the  module  to  be  mapped. 
No  other  control  cards  are  needed. 


' 


. 

. 


